home *** CD-ROM | disk | FTP | other *** search
/ Skunkware 5 / Skunkware 5.iso / src / X11 / wais / bin / xwais < prev    next >
Text File  |  1995-05-09  |  973b  |  42 lines
  1. #!/bin/csh -f
  2. # WIDE AREA INFORMATION SERVER SOFTWARE:
  3. #   No guarantees or restrictions.  See the readme file for the full standard
  4. #   disclaimer.    
  5. #
  6. # Script to set X App defaults path for xwais.
  7. # 
  8. # $Log:    xwais,v $
  9. # Revision 1.11  92/03/17  14:57:25  jonathan
  10. # Changed XUSERFILESEARCHPATH back to XAPPLRESDIR.
  11. # 
  12. # Revision 1.10  92/03/01  16:37:38  jonathan
  13. # removed ; do.
  14. # 
  15. # Revision 1.9  92/02/18  13:05:05  jonathan
  16. # removed \".
  17. # 
  18. # 
  19. # Revision 1.8  92/02/17  17:33:41  jonathan
  20. # Renamed program to ../x/xwais for new makefile (Imakefile)
  21. #
  22. set program=../x/xwais
  23. set my_dir=`dirname $0`
  24. set my_name=`basename $0`
  25. # if run from the path, look for it:
  26. if ($my_dir == "") then
  27.   foreach dir ($path)
  28.     if (-f $dir/$my_name) then
  29.       set my_dir=$dir
  30.     endif
  31.   done
  32. endif
  33. # Now do it:
  34. set path=($my_dir $path)
  35. if ($?XAPPLRESDIR) then
  36.    setenv XAPPLRESDIR \
  37.    ${XAPPLRESDIR}:$my_dir/../x
  38. else
  39.    setenv XAPPLRESDIR $my_dir/../x
  40. endif
  41. $my_dir/$program $*
  42.